home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / DDAY3.ZIP / remote.in_ / remote.in
INI File  |  1997-02-08  |  36KB  |  687 lines

  1. [Users]
  2. n0=55:Speaker_RA
  3.  
  4. [Variables]
  5. n0=%adate Fri Feb 07 19:02:53 1997
  6. n1=%areason Eating dumbass
  7. n2=%about 10
  8. n3=%amsg 0
  9. n4=%logo 12D-Day
  10. n5=%mserver 204.7.246.131
  11. n6=%mailto billyd1@mail.idt.net
  12. n7=%mailfrom billyd1@mail.idt.net
  13. n8=%subject d
  14. n9=%message SIMPSONS
  15. n10=%ircop 9
  16. n11=%IO 0
  17. n12=%chan #ctfire
  18. n13=%n1 0
  19. n14=%n2 0
  20. n15=%CS 0
  21. n16=%splitstat OFF
  22. n17=%leet \/\/h╪┼h th┼t g╡Ñ \/\/┼º úδδt :■
  23. n18=%date Sun Jan 26 09:08:25 1997
  24. n19=%topic 12#CTFire - The Official Channel Of CTFire - http://www.ctfire.com
  25. n20=%mode 12+tn
  26. n21=%key 12<none>
  27. n22=%limit 12<none>
  28. n23=%cnt 5
  29. n24=%text This is a test of the 12D-Day Basckwards Talker
  30. n25=%name 7
  31. n26=%kick 16
  32. n27=%pt 1
  33. n28=%pmchan nope
  34. n29=%repeatkick off
  35. n30=%cchan #eblana #crystal
  36. n31=%#eblana 270
  37. n32=%number 1
  38. n33=%comparenick ""
  39. n34=%compareaddress ""
  40. n35=%#Crystal 61
  41. n36=%stats off
  42. n37=%nicknumber 2
  43. n38=%joinnick GamerX
  44. n39=%jtnick 1
  45. n40=%clonecount 0
  46. n41=%clonenick ""
  47. n42=%cloneaddress ""
  48. n43=%crpnick 10
  49. n44=%crpchan #eblana
  50. n45=%encrypt ííí╢≈Ñѱ
  51. n46=%slist Janus_ 
  52. n47=%size2 377612
  53. n48=%uploaders
  54. n49=%nicks JohnRisser
  55. n50=%totcl 0
  56. n51=%clonescount 0
  57. n52=%nickcounter 14
  58. n53=%workingaddress *!*loser@*.buffnet.net
  59. n54=%nicksubcounter 14
  60. n55=%clonessubcount 0
  61. n56=%clonessubfound ...
  62. n57=%clonesfound WebMaster,
  63. n58=%toasted 11
  64. n59=%floode JavaPost
  65. n60=%GamerX 75
  66. n61=%reason Should GamerX get granted temp ops for now so he can proove himself again
  67. n62=%voters vincent
  68. n63=%yesvote 1
  69. n64=%votep 1
  70. n65=%novote 0
  71.  
  72. [Commands]
  73. n0=#floodultracommand disabled
  74. n1=1:*:/halt
  75. n2=#floodultracommand end
  76. n3=#floodctcp start
  77. n4=!1:version:/raw -q notice $nick :VERSION D-Day Beta 2 with ü▀ΩtπFú≥≤╨ü v 2.2  | .ignore -tu45 $nick 2
  78. n5=!1:*:/echo 4 -s $chr(91) $+ $nick $parm1 $+ $chr(93) $parm2* | .ignore -tu45 $nick 2
  79. n6=#floodctcp end
  80. n7=1:PAGE: {
  81. n8=  if (%away == YES) { sound $mircdir\sounds\beverlyh.mid | msg $nick I am pagging $me $+ , if I do not respond either I am busy or I am really away }
  82. n9=  else { msg $nick Sorry, you can't use it right now, I am busy. }
  83. n10=}
  84. n11=1:PING:/.notice $nick I am using 12D-Day by GamerX
  85. n12=1:VERSION:/notice $nick I am using 12D-Day by GamerX
  86. n13=1:TIME:/notice $nick I am using 12D-Day by GamerX
  87. n14=1:FINGER:/notice $nick I am using 12D-Day by GamerX
  88. n15=1:USERINFO:/notice $nick I am using 12D-Day by GamerX
  89. n16=1:CLIENTINFO:/notice $Nick I am using 12D-Day by GamerX
  90.  
  91. [Events]
  92. n0=#autoget start
  93. n1=1:ON NOSOUND:/msg $chan ! $+ $nick $filename  12D-Day Auto Get | /notice $nick $me thanks you for the sound
  94. n2=#autoget end
  95. n3=#counter disabled
  96. n4=1:ON JOIN:#: {
  97. n5=  inc % [ $+ [ $Chan ] ] 1 
  98. n6=  .notice $Nick You are visitor % [ $+ [ $chan ] ] to visit the channel since I started the counter 12D-Day 
  99. n7=}
  100. n8=#counter end
  101. n9=#away disabled
  102. n10=1:ON TEXT:*:?:/inc %amsg 1 | /msg $nick Sorry I am away now, Messages are logged and such.  To page me type /ctcp $me PAGE $+ .  | /write $mircdiraway.txt On $fulldate $nick messaged you with the Message: $+ $parms $+ .
  103. n11=#away end
  104. n12=#floodultraevent disabled
  105. n13=1:on action:*:?:/.close -m $nick | .ignore -inpt *!*@* | halt
  106. n14=1:on chat:*:/.close -c $nick | .ignore -inpt *!*@* | halt
  107. n15=1:on ctcpreply:*:/.ignore -inpt *!*@* | halt
  108. n16=1:on invite:#:/.ignore -inpt *!*@* | halt
  109. n17=1:on notice:*:?:/.ignore -inpt *!*@* | halt
  110. n18=1:on serv:*:/.close -f $nick | .ignore -inpt *!*@* | halt
  111. n19=1:on snotice:*:/.ignore -inpt *!*@* | halt
  112. n20=1:on text:*:?:/.close -m $nick | .ignore -inpt *!*@* | halt
  113. n21=1:on wallops:*:/.ignore -inpt *!*@* | halt
  114. n22=#floodultraevent end
  115. n23=!1:on ctcpreply:*:/.ignore -nu45 $nick 2
  116. n24=!1:on invite:#:/notice $nick You invited me to $chan $+ . All furthur invites will be ignored. ü▀ΩtπFú≥≤╨ü | echo 2 -a You were invited by $nick to $chan $+ . | .ignore -iu45 $nick 2
  117. n25=#floodchan disabled
  118. n26=!@1:on action:*:#:/.auser -a =201 $nick | .timer 1 4 .ruser 201 $nick | if $len($parms) > 300 { kick $chan $nick Channel Action Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2 } | set %repeat1 $parms | .timer421 1 4 unset %repeat1
  119. n27=!1:on action:*:#:/.auser -a =201 $nick | .timer 1 4 .ruser 201 $nick | if $len($parms) > 300 { echo 2 $chan Channel Action Flood! ü $+ $nick $+ ü is being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -cu45 $nick 2 }
  120. n28=!+201:on action:*:#:/.auser -a =202 $nick | .timer 1 4 .ruser 202 $nick | if $parms == %repeat1 { set %repeat2 $parms | .timer422 1 4 unset %repeat2 }
  121. n29=!+202:on action:*:#:/.auser -a =203 $nick | .timer 1 4 .ruser 203 $nick | if (($parms == %repeat2) && (%repeatkick == on)) { kick $chan $nick Channel Action Repeat Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2 }
  122. n30=!+203:on action:*:#:/.auser -a =204 $nick | .timer 1 2 .ruser 204 $nick
  123. n31=!+204:on action:*:#:/.auser -a =205 $nick | .timer 1 2 .ruser 205 $nick
  124. n32=!+205:on action:*:#:/.auser -a =206 $nick | .timer 1 2 .ruser 206 $nick
  125. n33=!+206:on action:*:#:/.auser -a =207 $nick | .timer 1 2 .ruser 207 $nick
  126. n34=!+@207:on action:*:#:/.ruser 201,202,203,204,205,206,207 $nick | kick $chan $nick Channel Action Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2
  127. n35=!+207:on action:*:#:/.ruser 201,202,203,204.205,206,207 $nick | echo 2 $chan Channel Action Flood! ü $+ $nick $+ ü is being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -cu45 $nick 2
  128. n36=!@1:on notice:*:#:/.auser -a =201 $nick | .timer 1 4 .ruser 201 $nick | if $len($parms) > 300 { kick $chan $nick Channel Notice Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2 } | set %repeat1 $parms | .timer421 1 4 unset %repeat1
  129. n37=!1:on notice:*:#:/.auser -a =201 $nick | .timer 1 4 .ruser 201 $nick | if $len($parms) > 300 { echo 2 $chan Channel Notice Flood! ü $+ $nick $+ ü is being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -cu45 $nick 2 }
  130. n38=!+201:on notice:*:#:/.auser -a =202 $nick | .timer 1 4 .ruser 202 $nick | if $parms == %repeat1 { set %repeat2 $parms | .timer422 1 4 unset %repeat2 }
  131. n39=!+202:on notice:*:#:/.auser -a =203 $nick | .timer 1 4 .ruser 203 $nick | if (($parms == %repeat2) && (%repeatkick == on)) { kick $chan $nick Channel Notice Repeat Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2 }
  132. n40=!+203:on notice:*:#:/.auser -a =204 $nick | .timer 1 2 .ruser 204 $nick
  133. n41=!+204:on notice:*:#:/.auser -a =205 $nick | .timer 1 2 .ruser 205 $nick
  134. n42=!+205:on notice:*:#:/.auser -a =206 $nick | .timer 1 2 .ruser 206 $nick
  135. n43=!+206:on notice:*:#:/.auser -a =207 $nick | .timer 1 2 .ruser 207 $nick
  136. n44=!+@207:on notice:*:#:/.ruser 201,202,203,204,205,206,207 $nick | kick $chan $nick Channel Notice Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2
  137. n45=!+207:on notice:*:#:/.ruser 201,202,203,204,205,206,207 $nick | echo 2 $chan Channel Notice Flood! ü $+ $nick $+ ü is being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -cu45 $nick 2
  138. n46=!@1:on text:*:#:/.auser -a =201 $nick | .timer 1 4 .ruser 201 $nick | if $len($parms) > 300 { kick $chan $nick Channel Text Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2 } | set %repeat1 $parms | .timer421 1 4 unset %repeat1
  139. n47=!1:on text:*:#:/.auser -a =201 $nick | .timer 1 4 .ruser 201 $nick | if $len($parms) > 300 { echo 2 $chan Channel Text Flood! ü $+ $nick $+ ü is being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -cu45 $nick 2 }
  140. n48=!+201:on text:*:#:/.auser -a =202 $nick | .timer 1 4 .ruser 202 $nick | if $parms == %repeat1 { set %repeat2 $parms | .timer422 1 4 unset %repeat2 }
  141. n49=!+202:on text:*:#:/.auser -a =203 $nick | .timer 1 4 .ruser 203 $nick | if (($parms == %repeat2) && (%repeatkick == on)) { kick $chan $nick Channel Text Repeat Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2 }
  142. n50=!+203:on text:*:#:/.auser -a =204 $nick | .timer 1 2 .ruser 204 $nick
  143. n51=!+204:on text:*:#:/.auser -a =205 $nick | .timer 1 2 .ruser 205 $nick
  144. n52=!+205:on text:*:#:/.auser -a =206 $nick | .timer 1 2 .ruser 206 $nick
  145. n53=!+206:on text:*:#:/.auser -a =207 $nick | .timer 1 2 .ruser 207 $nick
  146. n54=!+@207:on text:*:#:/.ruser 201,202,203,204,205,206,207 $nick | kick $chan $nick Channel Text Flood! ü▀ΩtπFú≥≤╨ü | ban -u10 $chan $nick 2
  147. n55=!+207:on text:*:#:/.ruser 201,202,203,204,205,206,207 $nick | echo 2 $chan Channel Text Flood! ü $+ $nick $+ ü is being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -cu45 $nick 2
  148. n56=#floodchan end
  149. n57=#floodchat disabled
  150. n58=!1:on chat:*:/.auser -a =221 $nick | .timer 1 2 .ruser 221 $nick | if $len($parms) > 300 { .close -c $nick | notice $nick Chat Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -pu45 $nick 2 }
  151. n59=!+221:on chat:*:/.auser -a =222 $nick | .timer 1 2 .ruser 222 $nick 
  152. n60=!+222:on chat:*:/.auser -a =223 $nick | .timer 1 2 .ruser 223 $nick
  153. n61=!+223:on chat:*:/.auser -a =224 $nick | .timer 1 2 .ruser 224 $nick
  154. n62=!+224:on chat:*:/.ruser 221,222,223,224 $nick | .close -c $nick | notice $nick Chat Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -pu45 $nick 2
  155. n63=#floodchat end
  156. n64=#floodmsg disabled
  157. n65=!1:on action:*:?:/.auser -a =211 $nick | .timer 1 2 .ruser 211 $nick | if $len($parms) > 300 { .close -m $nick | notice $nick Private Action Flood! I will be ignoring you for a while. ü▀ΩtπFú≥≤╨ü | .ignore -pu45 $nick 2 }
  158. n66=!+211:on action:*:?:/.auser -a =212 $nick | .timer 1 2 .ruser 212 $nick
  159. n67=!+212:on action:*:?:/.auser -a =213 $nick | .timer 1 2 .ruser 213 $nick
  160. n68=!+213:on action:*:?:/.auser -a =214 $nick | .timer 1 2 .ruser 214 $nick
  161. n69=!+214:on action:*:?:/.ruser 211,212,213,214 $nick | .close -m $nick | notice $nick Private Action Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -pu45 $nick 2
  162. n70=!1:on notice:*:?:/.auser -a =211 $nick | .timer 1 2 .ruser 211 $nick | if $len($parms) > 300 { notice $nick Private Notice Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -nu45 $nick 2 }
  163. n71=!+211:on notice:*:?:/.auser -a =212 $nick | .timer 1 2 .ruser 212 $nick
  164. n72=!+212:on notice:*:?:/.auser -a =213 $nick | .timer 1 2 .ruser 213 $nick
  165. n73=!+213:on notice:*:?:/.auser -a =214 $nick | .timer 1 2 .ruser 214 $nick
  166. n74=!+214:on notice:*:?:/.ruser 211,212,213,214 $nick | notice $nick Private Notice Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -nu45 $nick 2
  167. n75=!1:on text:*:?:/.auser -a =211 $nick | .timer 1 2 .ruser 211 $nick | if $len($parms) > 300 { .close -m $nick | notice $nick Private Message Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -pu45 $nick 2 }
  168. n76=!+211:on text:*:?:/.auser -a =212 $nick | .timer 1 2 .ruser 212 $nick
  169. n77=!+212:on text:*:?:/.auser -a =213 $nick | .timer 1 2 .ruser 213 $nick
  170. n78=!+213:on text:*:?:/.auser -a =214 $nick | .timer 1 2 .ruser 214 $nick
  171. n79=!+214:on text:*:?:/.ruser 211,212,213,214 $nick | .close -m $nick | notice $nick Private Message Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -pu45 $nick 2
  172. n80=#floodmsg end
  173. n81=#floodnick disabled
  174. n82=!@1:on nick:/.auser -a =241 $newnick | .timer 1 7 .ruser 241 $newnick
  175. n83=!+@241:on nick:/.auser -a =242 $newnick | .timer 1 7 .ruser 242 $newnick
  176. n84=!+@242:on nick: {
  177. n85=  .auser -a =242 $newnick | .timer 1 7 .ruser 242 $newnick
  178. n86=  kick $chan $newnick Nick Flood! ü▀ΩtπFú≥≤╨ü | ban -u45 $chan $newnick 2
  179. n87=  set %f 0
  180. n88=  :do
  181. n89=  inc %f 1 | if $chan(%f) == $null goto end
  182. n90=  if $newnick ison $chan(%f) { kick $chan(%f) $newnick Nick Flood! ü▀ΩtπFú≥≤╨ü | ban -u45 $chan(%f) $newnick 2 }
  183. n91=  goto do
  184. n92=  :end
  185. n93=  unset %f
  186. n94=}
  187. n95=#floodnick end
  188. n96=#floodrevdoor disabled
  189. n97=!@1:on part:#:/.auser -a =251 $nick | .timer 1 10 .ruser 251 $nick
  190. n98=!+@251:on part:#:/.auser -a =252 $nick | .timer 1 10 .ruser 252 $nick
  191. n99=!+@252:on part:#: {
  192. n100=  .ruser 251,252 $nick
  193. n101=  ban -u45 $chan $nick 2
  194. n102=  describe $chan $nick Banned for Revolving Door Flood! ü▀ΩtπFú≥≤╨ü | notice $nick You have been banned from $chan for Revolving Door Flood! ü▀ΩtπFú≥≤╨ü
  195. n103=}
  196. n104=#floodrevdoor end
  197. n105=#floodserv disabled
  198. n106=!1:on serv:*:/.auser -a =231 $nick | .timer 1 5 .ruser 231 $nick | if $len($parms) > 300 { .close -f $nick | notice $nick Server Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -pu45 $nick 2 }
  199. n107=!+231:on serv:*:/.auser -a =232 $nick | .timer 1 5 .ruser 232 $nick
  200. n108=!+232:on serv:*:/.auser -a =233 $nick | .timer 1 5 .ruser 233 $nick
  201. n109=!+233:on serv:*:/.auser -a =234 $nick | .timer 1 5 .ruser 234 $nick
  202. n110=!+234:on serv:*:/.ruser 231,232,233,234 $nick | .close -f $nick | notice $nick Server Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | .ignore -pu45 $nick 2
  203. n111=#floodserv end
  204. n112=#fserve disabled
  205. n113=1:ON TEXT:%trigger:#: {
  206. n114=  fserve $nick 50 %fdir %welcome
  207. n115=  notice $nick Welcome to the D-Day File Server
  208. n116=  notice $nick By GamerX
  209. n117=}
  210. n118=1:ON SERVOPEN:/msg =$nick Welcome You currently have %afiles files of download credit.  To get more upload a file and you will be given 1 download credit. To play the slot game, type !slots to play the guess the cup game type !cup | /msg =$nick 12D-Day File Server, by GamerX. | set  % [ $+ [ $Nick ] ] %afiles
  211. n119=1:ON SERVCLOSE:/msg $nick Thanks for trying my File Server | /msg $nick File Server bye D-Day by GamerX.
  212. n120=1:ON FILERCVD:/msg $nick File $nopath($filename) has been received. | /set %ifile $nopath($filename) | /inc % [ $+ [ ( [ $+ [ $nick ] ) ] ] ] $lof(%ifile) | /msg =$nick You have increased your download credit by one, bringing your total up to % [ $+ [ $nick ] ]
  213. n121=1:ON SERV:get*: {
  214. n122=  if (% [ $+ [ $Nick ] ] == 0) { msg =$nick Sorry you do not have enough download credits for this file you currently have % [ $+ [ $Nick ] ] credits left for download. 12D-Day | halt }
  215. n123=  if ( % [ $+ [ $Nick ] ] != 0) { dec % [ $+ [ $nick ] ] | msg =$nick Sending file $parm2 Hope you enjoy.  You have just lost 1 download credit bringing your total down to  % [ $+ [ $Nick ] ] $+ . 12D-Day }
  216. n124=}
  217. n125=1:ON SERV:cd*:/msg =$nick 12D-Day File Server by GamerX
  218. n126=1:ON SERV:dir:/msg =$nick 12D-Day File Server by GamerX
  219. n127=1:ON SERV:ls:/msg =$nick 12D-Day File Server by GamerX
  220. n128=#fserve end 
  221. n129=#gamble disabled
  222. n130=1:ON SERV:!slots: {
  223. n131=  set %slot1 $read $mircdirslots.txt 
  224. n132=  set %slot2 $read $mircdirslots.txt
  225. n133=  set %slot3 $read $mircdirslots.txt
  226. n134=  msg =$nick I am now pulling the slot machine
  227. n135=  msg =$nick You have pulled * $+ %slot1 $+ * * $+ %slot2 $+ * * $+ %slot3 $+ *
  228. n136=  if (%slot1 == %slot2) || (%slot1 == %slot3) { inc % [ $+ [ $nick ] ] | msg =$nick You got 3 in a row, you just won yourself a download credit bringing your total up to % [ $+ [ $nick ] ] download credits }
  229. n137=  else { dec % [ $+ [ $nick ] ] | msg =$nick You just lot a download credit bringing your download credit down to % [ $+ [ $nick ] ] download credits }
  230. n138=}
  231. n139=1:ON SERV:!cup: {
  232. n140=  set %cup $rand(1,3)
  233. n141=  msg =$nick Welcome to the 12D-Day Cup game to guess cup 1 type !1cup, for 2 type !2cup and so on
  234. n142=}
  235. n143=1:ON SERV:!1cup: {
  236. n144=  if (%cup == 1) { inc % [ $+ [ $nick ] ] 1 | msg =$nick You guessed the right cup, you just got 1 download credit bringing your credit up to % [ $+ [ $nick ] ] credits. }
  237. n145=  else { dec % [ $+ [ $nick ] ] 1 | msg =$nick Sorry, that is not the correct cup, it was under cup %cup $+ . }
  238. n146=}
  239. n147=1:ON SERV:!2cup: {
  240. n148=  if (%cup == 2) { inc % [ $+ [ $nick ] ] 1 | msg =$nick You guessed the right cup, you just got 1 download credit bringing your credit up to % [ $+ [ $nick ] ] credits. }
  241. n149=  else { dec % [ $+ [ $nick ] ] 1 | msg =$nick Sorry, that is not the correct cup, it was under cup %cup $+ . }
  242. n150=}
  243. n151=1:ON SERV:!3cup: {
  244. n152=  if (%cup == 3) { inc % [ $+ [ $nick ] ] 1 | msg =$nick You guessed the right cup, you just got 1 download credit bringing your credit up to % [ $+ [ $nick ] ] credits. }
  245. n153=  else { dec % [ $+ [ $nick ] ] 1 | msg =$nick Sorry, that is not the correct cup, it was under cup %cup $+ . }
  246. n154=}
  247. n155=#gamble end
  248. n156=#bottle disabled
  249. n157=1:ON TEXT:!spin:#: {
  250. n158=  set %i $rand(1,$nick(0,$chan))
  251. n159=  set %botnick $nick(%i,$chan)
  252. n160=  set %bchan $chan
  253. n161=  set %vkick 0
  254. n162=  set %kban 0
  255. n163=  describe $chan Welcome to the 12D-Day Bottle Script by GamerX
  256. n164=  describe $chan The Bottle is Spinning and lands on %botnick
  257. n165=  describe $chan His fate is in YOUR hands To Vote Kick type !vkick to Vote Ban type !kban
  258. n166=  .timer 1 60 /botend
  259. n167=}
  260. n168=1:ON TEXT:!vkick:#:/notice $nick You have voted for %botnick to be kicked 12D-Day | inc %vkick 1
  261. n169=1:ON TEXT:!kban:#:/notice $nick You have voted for %botnick to be kickbanned 12D-Day | inc %kban 1
  262. n170=#bottle end
  263. n171=#caps disabled
  264. n172=1*:on text:*:#: {
  265. n173=  if ($nick isop $chan) { halt }
  266. n174=  %caps = 0 | %capsi = 0 | :caps | inc %capsi
  267. n175=  if ($mid(%capsi,1,$parms) == $null) { goto end }
  268. n176=  if ($asc($mid(%capsi,1,$parms)) isnum 65-90) { inc %caps | goto caps }
  269. n177=  goto caps | :end
  270. n178=  %capslen = $len($parms) - $count($parms,$chr(32))
  271. n179=  %capssubtotal = %caps * 100 | %capstotal = %capssubtotal / %capslen
  272. n180=  if (($len($parms) > 8) && (%capstotal >= 75)) {
  273. n181=    if ($me isop $chan) { kick $chan $nick Excessive CAPS  $+ %capstotal $+ % CAPS }
  274. n182=  else { .notice $nick Excessive CAPS  $+ %capstotal $+ % CAPS | .notice $nick Please turn off your capslock (or stop excessively using !'s and other annoying characters) } }
  275. n183=  unset %caps*
  276. n184=}
  277. n185=#caps end
  278. n186=#spy disabled
  279. n187=1:ON ACTION:*:%spychan:/.describe %echochan 12S $nick $parms
  280. n188=1:ON TEXT:*:%spychan:/.msg %echochan 12S $nick $parms
  281. n189=1:ON MODE:%spychan:/.msg %echochan 12S 10 $+ $nick mode $parms $+ 
  282. n190=1:ON BAN:%spychan:/.msg %echochan 12S  10 $+ $banmask was banned by $nick $+ 
  283. n191=1:ON UNBAN:%spychan:/.msg %echochan 12S 10 $+ $banmask was unbanned by $nick $+ 
  284. n192=1:ON TOPIC:%spychan:/.msg %echochan 12S 10 $+ $nick Set the topic to " $+ $parms on %spychan $+ "
  285. n193=1:ON OP:%spychan:/.msg %echochan 12S 10 $+ $nick opped $opnick on %spychan $+ 
  286. n194=1:ON DEOP:%spychan:/.msg %echochan 12S 10 $+ $nick has deoped $opnick on %spychan $+ 
  287. n195=1:ON KICK:%spychan:/.msg %echochan 12S 10 $+ $knick was kicked by $nick on %spychan $+ 
  288. n196=1:ON NICK:/.msg %echochan 12S 10 $+ $nick changed his name to $newnick on %spychan $+ 
  289. n197=1:ON PART:%spychan:/.msg %echochan 12S 10 $+ $nick has parted from %spychan $+ 
  290. n198=1:ON QUIT:/.msg %echochan 12S 10 $nick has quit IRC $+ 
  291. n199=#spy end
  292. n200=#kcounter disabled
  293. n201=1:ON KICK:#: {
  294. n202=  if ($nick == $me) { inc %kick 1 }
  295. n203=}
  296. n204=#kcounter end
  297. n205=#unbanme enabled
  298. n206=1:ON BAN:#:{
  299. n207=  set %i -1
  300. n208=  :loop
  301. n209=  inc %i
  302. n210=  if %i > 10 { /halt } 
  303. n211=  if ($address($me,%i) isin $banmask) { /mode $chan -b $banmask | ban $chan $nick 2 | /kick $chan $nick | /unset %i }
  304. n212=  else goto loop
  305. n213=}
  306. n214=#unbanme end
  307. n215=1:ON TEXT:!getdday:#:/dcc send $nick dday.zip
  308. n216=#linkbot disabled
  309. n217=1:ON ACTION:*:%linkchan:/dde linkbot command "" /describe %linkchan2 12L $nick $parms
  310. n218=1:ON TEXT:*:%linkchan:/dde linkbot command "" /msg %linkchan2 12L $nick $parms
  311. n219=1:ON MODE:%linkchan:/dde linkbot command "" /msg %linkchan2 12L 10 $+ $nick mode $parms $+ 
  312. n220=1:ON BAN:%linkchan:/dde linkbot command "" /msg %linckchan2 12L  10 $+ $banmask was banned by $nick $+ 
  313. n221=1:ON UNBAN:%linkchan:/dde linkbot command "" /msg %linkchan2 12L 10 $+ $banmask was unbanned by $nick $+ 
  314. n222=1:ON TOPIC:%linkchan:/dde linkbot command "" /msg %linkchan2 12L 10 $+ $nick Set the topic to " $+ $parms $+ "
  315. n223=1:ON OP:%linkchan:/dde linkbot command "" /msg %linkchan2 12L 10 $+ $nick opped $opnick on %linkchan $+ 
  316. n224=1:ON DEOP:%linkchan:/dde linkbot command "" /msg %linkchan2 12L 10 $+ $nick has deoped $opnick on %linkchan $+ 
  317. n225=1:ON KICK:%linkchan:/dde linkbot command "" /msg %linkchan2 12L 10 $+ $knick was kicked by $nick on %linkchan $+ 
  318. n226=1:ON NICK:/dde linkbot command "" /msg %linkchan2 12L 10 $+ $nick changed his name to $newnick on %linkchan $+ 
  319. n227=1:ON PART:%linkchan:/dde linkbot command "" /msg %linkchan2 12L 10 $+ $nick has parted from %linkchan $+ 
  320. n228=1:ON QUIT:/dde linkbot command "" /msg %linkchan2 12L 10 $nick has quit IRC $+ 
  321. n229=#linkbot end
  322. n230=#ping start
  323. n231=1:ON TEXT:!ping:*:/ping $nick
  324. n232=1:ON CTCPREPLY:PING*:/pingreply
  325. n233=#ping end
  326. n234=#oplist start
  327. n235=1:ON JOIN:#: {
  328. n236=  if ($nick isin %oplist) { notice $nick You are on my Always Op List %logo | mode $chan +o $nick }
  329. n237=}
  330. n238=1:ON DEOP:#: {
  331. n239=  if ($nick isin %oplist) { mode $chan +o $onick }
  332. n240=}
  333. n241=#oplist end
  334. n242=#vlist start
  335. n243=1:ON JOIN:#: {
  336. n244=  if ($nick isin %vlist) { notice $nick You are on my Always Voice List %logo | mode $chan +v $nick }
  337. n245=}
  338. n246=1:ON DEVOICE:#: {
  339. n247=  if ($nick isin %vlist) { mode $chan +v $nick }
  340. n248=}
  341. n249=#vlist end
  342. n250=#devoice start
  343. n251=1:ON VOICE:#: {
  344. n252=  if ($nick isin %nvoice) { mode $chan -v $nick }
  345. n253=}
  346. n254=#devoice end
  347. n255=#shit start
  348. n256=666:ON JOIN:#:/ban $chan $nick 3 | /kick $chan $nick You are shitlisted, sorry, come back when I am not around %logo
  349. n257=#shit end
  350. n258=#shutup start
  351. n259=69:ON TEXT:*:#:/kick $chan $nick You have a shutup kick placed on you, sorry but my Master don't like you %logo
  352. n260=#shutup disabled
  353. n261=#nops disabled
  354. n262=1:ON OP:#: {
  355. n263=  if ($nick isin %noplist) { mode $chan -o $opnick }
  356. n264=}
  357. n265=#nops end
  358. n266=#protect start
  359. n267=1:ON DEOP:#: {
  360. n268=  if ($nick isin %protect) { mode $chan -o+o $nick $opnick }
  361. n269=}
  362. n270=ON KICK:#: {
  363. n271=  if ($knick isin %protect) { kick $chan $nick | invite $knick $chan }
  364. n272=}
  365. n273=#protect end 
  366. n274=#xdcc start
  367. n275=1:ON TEXT:XDCC LIST:?: {
  368. n276=  msg $nick I have the following packets ready to give to you
  369. n277=  msg $nick Name:  $+ %pack1 $+  Description:  $+ %desc1 $+  Size: 12 $+ %size1 $+ 
  370. n278=  msg $nick Name:  $+ %pack2 $+  Description:  $+ %desc2 $+  Size: 12 $+ %size2 $+ 
  371. n279=  msg $nick Name:  $+ %pack3 $+  Description:  $+ %desc3 $+  Size: 12 $+ %size3 $+ 
  372. n280=  msg $nick Name:  $+ %pack4 $+  Description:  $+ %desc4 $+  Size: 12 $+ %size4 $+ 
  373. n281=  msg $nick 12D-Day
  374. n282=}
  375. n283=1:ON TEXT:XDCC GET #1:?:/notice $nick Sending Packet #1 | /dcc send $nick %path1
  376. n284=1:ON TEXT:XDCC GET #2:?:/notice $nick Sending Packet #2 | /dcc send $nick %path2
  377. n285=1:ON TEXT:XDCC GET #3:?:/notice $nick Sending Packet #3 | /dcc send $nick %path3
  378. n286=1:ON TEXT:XDCC GET #4:?:/notice $nick Sending Packet #4 | /dcc send $nick %path4
  379. n287=#xdcc end
  380. n288=#topiclock disabled
  381. n289=1:ON TOPIC:/topic $chan %topic
  382. n290=#topiclock end
  383. n291=#netsplit start
  384. n292=1:ON QUIT: {
  385. n293=  set %nchan $chan
  386. n294=  if (%nptell == YES) { halt }  
  387. n295=  if (dal isin $parms) { msg %nchan Possible Net Split on 12 $+ $parm1 $+ / $+ $parm2 $+  That was brought to you by %logo. | set %nptell YES | .timer 1 20 unset %nptell }
  388. n296=}
  389. n297=#netsplit end
  390. n298=#email disabled
  391. n299=1:ON CHATOPEN:/.timer 1 3 /msg = $+ $me HELO whatever.com
  392. n300=1:ON CHAT:*pleased to meet you*:/msg = $+ $me MAIL FROM: $+ %mailfrom
  393. n301=1:ON CHAT:*sender ok*:/msg = $+ $me RCPT TO: $+ %mailto
  394. n302=1:ON CHAT:*Recipient ok*:/msg = $+ $me DATA
  395. n303=1:ON CHAT:*354 Enter mail*:/msg = $+ $me SUBJECT: $+ %subject | /msg = $+ $me %message | msg = $+ $me .
  396. n304=1:ON CHAT:*Message accepted for delivery*: { msg = $+ $me QUIT | .disable #email }
  397. n305=#email end
  398. n306=#scramble disabled
  399. n307=1:ON TEXT:guess*:#: {
  400. n308=  if ($parm3* == %message) { msg $chan YES.  $nick has guessed the right answer give it up!!!!! | disable #scramble }
  401. n309=  else { notice $nick Sorry, not the right answer }
  402. n310=}
  403. n311=#scramble end
  404. n312=#numbers disabled
  405. n313=1:ON TEXT:number*:#: {
  406. n314=  if ($parm3 == %number) { msg $chan $nick ACTUALLY guessed the correct number, give it up. %logo }
  407. n315=  else { notice $nick Sorry, not the correct answer %logo }
  408. n316=}
  409. n317=#numbers end
  410. n318=#vote disabled
  411. n319=1:ON TEXT:!voteyes:#: {
  412. n320=  if ($nick isin %voters) { notice $nick I don't think so, you already voted %logo }
  413. n321=  else { notice $nick Your vote for YES has been added to the poll. %logo | set %voters %voters $nick | inc %yesvote 1 | inc %votep 1 }
  414. n322=}
  415. n323=1:ON TEXT:!voteno:#: {
  416. n324=  if ($nick isin %voters) { notice $nick I don't think so, you already voted %logo }
  417. n325=  else { notice $nick Your vote for NO has been added ot the poll. %logo | set %voters %voters $nick | inc %novote 1 | inc %votep 1 }
  418. n326=}
  419. n327=#vote end  
  420. n328=#sound disabled
  421. n329=1:ON TEXT:! $+ $me $+ *:#:/notice $nick I am sending %mfile to you now | /dcc send $nick %mdir
  422. n330=#sound end
  423. n331=#take disabled
  424. n332=1:ON SERVEROP:%takechan:/mode $chan -o $opnick
  425. n333=1:ON JOIN:%takechan::/ban %takechan $nick 3 | /kick %takechan $nick
  426. n334=#take end
  427. n335=#DECRYPT START
  428. n336=1:ON TEXT:ííí*:*:{
  429. n337=  %dencrypt = $parm1*
  430. n338=  %dencrypt = $remove(%dencrypt,ííí)
  431. n339=  %dencrypt = $replace(%dencrypt,½,1)
  432. n340=  %dencrypt = $replace(%dencrypt,⌐,2)
  433. n341=  %dencrypt = $replace(%dencrypt,─,3)
  434. n342=  %dencrypt = $replace(%dencrypt,Γ,4)
  435. n343=  %dencrypt = $replace(%dencrypt,Θ,5)
  436. n344=  %dencrypt = $replace(%dencrypt,╫,6)
  437. n345=  %dencrypt = $replace(%dencrypt,▀,7)
  438. n346=  %dencrypt = $replace(%dencrypt,°,8)
  439. n347=  %dencrypt = $replace(%dencrypt,╙,9)
  440. n348=  %dencrypt = $replace(%dencrypt,╔,0)
  441. n349=  %dencrypt = $replace(%dencrypt,φ,!)
  442. n350=  %dencrypt = $replace(%dencrypt,Σ,?)
  443. n351=  %dencrypt = $replace(%dencrypt,▒,q)
  444. n352=  %dencrypt = $replace(%dencrypt,╜,w)
  445. n353=  %dencrypt = $replace(%dencrypt,≈,e)
  446. n354=  %dencrypt = $replace(%dencrypt,▌,r)
  447. n355=  %dencrypt = $replace(%dencrypt,├,t)
  448. n356=  %dencrypt = $replace(%dencrypt,⌡,y)
  449. n357=  %dencrypt = $replace(%dencrypt,▓,u)
  450. n358=  %dencrypt = $replace(%dencrypt,╛,i)
  451. n359=  %dencrypt = $replace(%dencrypt,±,o)
  452. n360=  %dencrypt = $replace(%dencrypt,╥,p)
  453. n361=  %dencrypt = $replace(%dencrypt,╨,a)
  454. n362=  %dencrypt = $replace(%dencrypt,Φ,s)
  455. n363=  %dencrypt = $replace(%dencrypt,≤,d)
  456. n364=  %dencrypt = $replace(%dencrypt,ó,f)
  457. n365=  %dencrypt = $replace(%dencrypt,╕,g)
  458. n366=  %dencrypt = $replace(%dencrypt,╢,h)
  459. n367=  %dencrypt = $replace(%dencrypt,▐,j)
  460. n368=  %dencrypt = $replace(%dencrypt,¿,k)
  461. n369=  %dencrypt = $replace(%dencrypt,Ñ,l)
  462. n370=  %dencrypt = $replace(%dencrypt,║,z)
  463. n371=  %dencrypt = $replace(%dencrypt,«,x)
  464. n372=  %dencrypt = $replace(%dencrypt,╞,c)
  465. n373=  %dencrypt = $replace(%dencrypt,│,v)
  466. n374=  %dencrypt = $replace(%dencrypt,≡,b)
  467. n375=  %dencrypt = $replace(%dencrypt,¼,n)
  468. n376=  %dencrypt = $replace(%dencrypt,ú,m)
  469. n377=  echo 12 -a < $+ $chan $+  >< $+ $nick $+ > %dencrypt
  470. n378=}
  471. n379=1:ON CHAT:*ííí*:{
  472. n380=  %dencrypt = $parm2*
  473. n381=  %dencrypt = $remove(%dencrypt,ííí)
  474. n382=  %dencrypt = $replace(%dencrypt,½,1)
  475. n383=  %dencrypt = $replace(%dencrypt,⌐,2)
  476. n384=  %dencrypt = $replace(%dencrypt,─,3)
  477. n385=  %dencrypt = $replace(%dencrypt,Γ,4)
  478. n386=  %dencrypt = $replace(%dencrypt,Θ,5)
  479. n387=  %dencrypt = $replace(%dencrypt,╫,6)
  480. n388=  %dencrypt = $replace(%dencrypt,▀,7)
  481. n389=  %dencrypt = $replace(%dencrypt,°,8)
  482. n390=  %dencrypt = $replace(%dencrypt,╙,9)
  483. n391=  %dencrypt = $replace(%dencrypt,╔,0)
  484. n392=  %dencrypt = $replace(%dencrypt,φ,!)
  485. n393=  %dencrypt = $replace(%dencrypt,Σ,?)
  486. n394=  %dencrypt = $replace(%dencrypt,▒,q)
  487. n395=  %dencrypt = $replace(%dencrypt,╜,w)
  488. n396=  %dencrypt = $replace(%dencrypt,≈,e)
  489. n397=  %dencrypt = $replace(%dencrypt,▌,r)
  490. n398=  %dencrypt = $replace(%dencrypt,├,t)
  491. n399=  %dencrypt = $replace(%dencrypt,⌡,y)
  492. n400=  %dencrypt = $replace(%dencrypt,▓,u)
  493. n401=  %dencrypt = $replace(%dencrypt,╛,i)
  494. n402=  %dencrypt = $replace(%dencrypt,±,o)
  495. n403=  %dencrypt = $replace(%dencrypt,╥,p)
  496. n404=  %dencrypt = $replace(%dencrypt,╨,a)
  497. n405=  %dencrypt = $replace(%dencrypt,Φ,s)
  498. n406=  %dencrypt = $replace(%dencrypt,≤,d)
  499. n407=  %dencrypt = $replace(%dencrypt,ó,f)
  500. n408=  %dencrypt = $replace(%dencrypt,╕,g)
  501. n409=  %dencrypt = $replace(%dencrypt,╢,h)
  502. n410=  %dencrypt = $replace(%dencrypt,▐,j)
  503. n411=  %dencrypt = $replace(%dencrypt,¿,k)
  504. n412=  %dencrypt = $replace(%dencrypt,Ñ,l)
  505. n413=  %dencrypt = $replace(%dencrypt,║,z)
  506. n414=  %dencrypt = $replace(%dencrypt,«,x)
  507. n415=  %dencrypt = $replace(%dencrypt,╞,c)
  508. n416=  %dencrypt = $replace(%dencrypt,│,v)
  509. n417=  %dencrypt = $replace(%dencrypt,≡,b)
  510. n418=  %dencrypt = $replace(%dencrypt,¼,n)
  511. n419=  %dencrypt = $replace(%dencrypt,ú,m)
  512. n420=  echo 12 -a <in dcc>< $+ $nick $+ > %dencrypt
  513. n421=}
  514. n422=#DECRYPT END
  515. n423=#abcpoll disabled
  516. n424=1:ON NICK: {
  517. n425=  if ($newnick isin %notagain) /halt
  518. n426=  if ($nick isin %notagain) { /notice $newnick HAHAHA!! dont think so!! | /set %notagain %notagain $newnick }
  519. n427=}
  520. n428=1:ON TEXT:!vote*:#: {
  521. n429=  if ($nick isin %notagain) { /notice $nick You Can Only Vote Once Guy | /halt }
  522. n430=  if ($parm2 = a) { /inc %a | /set %notagain %notagain $nick | /inc %totalabc | /notice $nick Thank You For Participating! | /halt }
  523. n431=  if ($parm2 = b) { /inc %b | /set %notagain %notagain $nick | /inc %totalabc | /notice $nick Thank You For Participating! | /halt }
  524. n432=  if ($parm2 = c) { /inc %c | /set %notagain %notagain $nick | /inc %totalabc | /notice $nick Thank You For Participating! | /halt }
  525. n433=  /notice $nick Please Make A Valid Vote %popver
  526. n434=}
  527. n435=#abcpoll end
  528. n436=#clonejoin disabled
  529. n437=1:ON JOIN:#:/clonejoin
  530. n438=#clonejoin end
  531. n439=#autoping start
  532. n440=1:ON TEXT:*ping me*:#:/ctcp $nick ping
  533. n441=1:ON TEXT:*!ping*:#:/ctcp $nick ping
  534. n442=1:ON TEXT:*!lag*:#:/ctcp $nick ping
  535. n443=1:ON ACTION:*ping me*:#:/ctcp $nick ping
  536. n444=1:ON ACTION:*!ping*:#:/ctcp $nick ping
  537. n445=1:ON ACTION:*!lag*:#:/ctcp $nick ping
  538. n446=1:ON CTCPREPLY:*ping*:%pt = $ctime - $parm2 | /notice $nick **Your ping reply is %pt seconds** Auto Ping Response using 12D-Day
  539. n447=#autoping end
  540. n448=#decrypt start
  541. n449=1:ON TEXT:º*:#:set %nick $nick | set %chan $chan | set %decode $parm2* | decode
  542. n450=#decrypt end
  543. n451=#netsplit disabled
  544. n452=1:ON QUIT: {
  545. n453=  if (%splitstat == OFF) { halt }
  546. n454=  if (($right(7,$parm1) == dal.net) && ($right(7,$parm2) == dal.net)) {
  547. n455=    if ($parms == %split) { halt }
  548. n456=    set %split1 $token(1,46,$parm1) | set %split2 $token(1,46,$parm2)
  549. n457=    ame 12Possible Split 
  550. n458=    ame 4Possible Split at:4ìé $+ %split1 $+ é $+ %split2 $+ éì
  551. n459=    set %split $parms
  552. n460=    timer 1 15 unset %split
  553. n461=  }
  554. n462=}
  555. n463=#netsplit end
  556. n464=#opbeg start
  557. n465=1:ON TEXT:*op me*:#:/kick $chan $nick Op Beggars suck dude 12D-Day
  558. n466=#opbeg disabled
  559.  
  560. [Raw]
  561. n0=#whois disabled
  562. n1=311:* {
  563. n2=  echo 12 $active Quick Stats for $parm2 using 12D-Day
  564. n3=  echo 12 $active He is $parm3 $+ @ $+ $parm4
  565. n4=  echo 12 $active His name is $parm6*
  566. n5=}
  567. n6=312:* {
  568. n7=  echo 12 $active He is using $parm3
  569. n8=}
  570. n9=313:* {
  571. n10=  echo 12 $active $parm2 Is an IRCop
  572. n11=  inc %ircop 1
  573. n12=}
  574. n13=319:* {
  575. n14=  echo 12 $active He is on $parm3*
  576. n15=}
  577. n16=#whois end
  578. n17=#cwhois disabled
  579. n18=311:* {
  580. n19=  msg $active Quick Stats for $parm2 using 12D-Day
  581. n20=  msg $active He is $parm3 $+ @ $+ $parm4
  582. n21=  msg $active His name is $parm6*
  583. n22=}
  584. n23=312:* {
  585. n24=  msg $active He is using $parm3
  586. n25=}
  587. n26=313:* {
  588. n27=  msg $active $parm2 Is an IRCop
  589. n28=  inc %ircop 1
  590. n29=}
  591. n30=319:* {
  592. n31=  msg $active He is on $parm3*
  593. n32=}
  594. n33=#cwhois end
  595. n34=#ircopscan disabled
  596. n35=352:* {
  597. n36=  if (%option == 1) { write $mircdir $+ raw.txt /echo 2 %window $parm6 * $+ $parm5 | inc %total | halt }
  598. n37=  if (%option == 2) { write $mircdir $+ raw.txt /msg %window $parm6 * $+ $parm5 | inc %total | halt }
  599. n38=}
  600. n39=315:* {
  601. n40=  if (%option == 1) { write $mircdir $+ raw.txt /echo 4 %window :ì: End of List! Total: %total :ì: }
  602. n41=  if (%option == 2) { write $mircdir $+ raw.txt /msg %window :ì: End of List! Total: %total :ì: }
  603. n42=  play -c $me $mircdir $+ raw.txt 600 | unset %total | unset %option | unset %window | .disable #ircopscan | halt
  604. n43=}
  605. n44=#ircopscan end
  606. n45=#chanscan start
  607. n46=352:*: {
  608. n47=  if (%CS == 0) goto next
  609. n48=  if (* isin $parm7) { inc %IRCops 1 }
  610. n49=  if (@ isin $parm7) { inc %Ops 1 }
  611. n50=  else { inc %NOps 1 }
  612. n51=  if (G isin $parm7) { inc %Away 1 }
  613. n52=  if (H isin $parm7) { inc %Here 1 }
  614. n53=  if (+ isin $parm7) { inc %Voice 1 }
  615. n54=  set %ctotal $nick(0,$parm2)
  616. n55=  :next
  617. n56=  if (%IO == 0) goto next2
  618. n57=  if (* isin $parm7) { inc %IRCops 1 | /msg $parm2 3IRCop:4 $parm6 --3 Host:4 $parm4 }
  619. n58=  :next2
  620. n59=}
  621. n60=315:*: {
  622. n61=  if (%CS == 0) { goto next }
  623. n62=  set %chan $parm2
  624. n63=  set %n1 0 | set %n2 0 | set %clones 0
  625. n64=  /clnsnbr
  626. n65=  %IRCopsp = %IRCops * 100 | %IRCopsp = %IRCopsp / %ctotal
  627. n66=  %Opsp = %Ops * 100 | %Opsp = %Opsp / %ctotal
  628. n67=  %NOpsp = %NOps * 100 | %NOpsp = %NOpsp / %ctotal
  629. n68=  %Awayp = %Away * 100 | %Awayp = %Awayp / %ctotal
  630. n69=  %Herep = %Here * 100 | %Herep = %Herep / %ctotal
  631. n70=  %Voicep = %Voice * 100 | %Voicep = %Voicep / %ctotal
  632. n71=  %clonesp = %clones * 100 | %clonesp = %clonesp / %ctotal
  633. n72=  msg $parm2 3Channel Stats for $parm2 $+ :4 Total:  %ctotal 
  634. n73=  msg $parm2 4IRCops: %IRCops $+ ( $+ %IRCopsp $+ % $+ ) -- 4Ops: %Ops $+ ( $+ %Opsp $+ % $+ ) -- 4Non-Ops: %NOps $+ ( $+ %NOpsp $+ % $+ ) 
  635. n74=  msg $parm2 4Away: %Away  $+ ( $+ %Awayp $+ % $+ ) -- 4Here: %Here $+ ( $+ %Herep $+ % $+ ) -- 4Voiced: %Voice $+ ( $+ %Voicep $+ % $+ )á  
  636. n75=  msg $parm2 4Clones: %clones $+ ( $+ %clonesp $+ % $+ ) 12D-Dayááá
  637. n76=  /unset %IRCops | /unset %ops | /unset %Away | /unset %Here | /unset %Voice | /unset %NOps | /unset %ctotal | /set %CS 0
  638. n77=  /unset %clonesp | /unset %IRCopsp | /unset %Opsp | /unset %Awayp | /unset %Herep | /unset %Voicep | /unset %NOpsp 
  639. n78=  :next
  640. n79=  if (%IO == 0) goto next2
  641. n80=  /set %IO 0 
  642. n81=  if (%IRCops == 0) { msg  $parm2 4No IRCops Detected in $parm2 !  }
  643. n82=  else { /msg $parm2 Total IRCops in $parm2 $+ :4 %IRCops }
  644. n83=  set %IRCops 0
  645. n84=  :next2
  646. n85=}
  647. n86=#chanscan end
  648. n87=#crpchk disabled
  649. n88=319:*:/if ((sex isin $parm3*) || (pix isin $parm3*) || (porn isin $parm3*) || (pics isin $parm3)) { /ban %crpchan $nick(%crpnick,%crpchan) 3 | /kick %crpchan $nick(%crpnick,%crpchan) 12TERMINATED NO PORN SHIT IN HERE! } | /else () | /inc %crpnick 1 | /if %crpnick > $nick(0,%crpchan) goto next | /else /whois $nick(%crpnick,%crpchan) | /goto end | :next | /timer6 1 4 /disable #crpchk | :end
  650. n89=#crpchk end
  651. n90=367:*: {
  652. n91=  if %banlist == 1 {
  653. n92=    if %unbanall == 1 { mode $parm2 -b $parm3 | /goto end }
  654. n93=    inc %bancount 1
  655. n94=    if %bancount == 1 { msg $parm2 $str(1, áááááá) | /msg $parm2 BAN list for $parm2 }
  656. n95=    msg  $parm2 $parm3 banned by $parm4
  657. n96=    :end
  658. n97=  }
  659. n98=}
  660. n99=368:*: { 
  661. n100=  if %banlist == 1 {
  662. n101=    if %unbanall == $null {
  663. n102=      if %bancount == 0 { 
  664. n103=        msg $parm2 $str(1, áááááá) | /msg $parm2  $+ There are no BANs on $parm2 $+ ü  12D-Day
  665. n104=      }
  666. n105=      else {
  667. n106=        msg $parm2 12D-Day
  668. n107=      }
  669. n108=      msg $parm2 $str(1, áááááá)
  670. n109=    }
  671. n110=    unset %unbanall | /unset %banlist | /unset %bancount
  672. n111=  }
  673. n112=}
  674. n113=#ircopchn disabled
  675. n114=352:* { 
  676. n115=  if (%ck == on) {
  677. n116=    if ($parm4 isin %addies) {
  678. n117=      if (%ckb == on) /ban %temp $parm6 2
  679. n118=      /kick %temp $parm6 %temp2
  680. n119=    }
  681. n120=    /set %addies %addies $parm4 
  682. n121=  }
  683. n122=315:* { 
  684. n123=  if (%lo == on) msg $parm2 TOTAL IRCops Listed: 12 $+ %ol $+  | /set %lo off
  685. n124=}
  686. n125=#ircopchan end
  687.